O que fazer para criar suas definies de cores:

Crie um novo diretrio, para este exemplo usaremos o preto, portanto criaremos um folder chamado `black` preto em ingles

Crie um arquivo novo chamado `black.asp` dentro do diretrio `colour`

No `black.asp` voc escrever o seguinte cdigo:


<%
'Black colour sheet

strFolderName = "black"

img_bg = "colour/"&strFolderName&"/bg.gif"
img_top_right_curve =  "colour/"&strFolderName&"/top_right_curve.gif"
img_bottom_right_curve = "colour/"&strFolderName&"/bottom_right_curve.gif"
img_bottom_left_curve = "colour/"&strFolderName&"/bottom_left_curve.gif"
img_top_left_curve	 = "colour/"&strFolderName&"/top_left_curve.gif"
img_bg_colour = "#0033FF"
%>

Agora abra um outro diretrio de cores, qualquer um, e copie todos os arquivos para o seu diretrio `black`. Agora edite as images como desejar.

Agora para montar a nova cor de cenrio adicione a sua pgina no arquivo `common.asp`. Adicione estas linhas no final do arquivo `common.asp`:

<%IF strColourScheme = "Black" THEN%>
<!--#include file="colour/black.asp" -->
<%ELSE%>
<%END IF%>

Agora abra a pgina `admin_control.asp` localize estes cdigos:

<select name="colour">
<option <%IF strColourScheme = "Red" THEN Response.write ("selected")%> value=Red>Vermelho
<option <%IF strColourScheme = "Green" THEN Response.write ("selected")%> value=Green>Verde
<option <%IF strColourScheme = "Blue" THEN Response.write ("selected")%> value=Blue>Azul
<option <%IF strColourScheme = "Yellow" THEN Response.write ("selected")%> value=Yellow>Amarelo
<option <%IF strColourScheme = "White" THEN Response.write ("selected")%> value=White>Branco
</select>

Para adicionar a sua nova cor na lista de seleo troque os cdigos encontrados acima por estes:

<select name="colour">
<option <%IF strColourScheme = "Red" THEN Response.write ("selected")%> value=Red>Vermelho
<option <%IF strColourScheme = "Green" THEN Response.write ("selected")%> value=Green>Verde
<option <%IF strColourScheme = "Blue" THEN Response.write ("selected")%> value=Blue>Azul
<option <%IF strColourScheme = "Yellow" THEN Response.write ("selected")%> value=Yellow>Amarelo
<option <%IF strColourScheme = "White" THEN Response.write ("selected")%> value=White>Branco
<option <%IF strColourScheme = "Black" THEN Response.write ("selected")%> value=Black>Preto
</select>

Agora voc pode criar os cenrios com as cores que desejar!